home *** CD-ROM | disk | FTP | other *** search
/ 10,000 Designer Photos / 10,000 designer photos.iso / menu.dxr / 00008_UI Rollover Change Member.ls < prev    next >
Encoding:
Text File  |  1999-04-14  |  1.4 KB  |  37 lines
  1. property standardImage, alternateImage, nextCM
  2.  
  3. on mouseEnter me
  4.   puppetSound("swoosh2")
  5.   set the member of sprite the spriteNum of me to me.alternateImage
  6. end
  7.  
  8. on mouseLeave me
  9.   set the member of sprite the spriteNum of me to me.standardImage
  10. end
  11.  
  12. on beginSprite me
  13.   me.standardImage = the member of sprite me.spriteNum
  14.   if nextCM = 1 then
  15.     memref = the member of sprite the currentSpriteNum
  16.     castLibNum = memref.castLibNum
  17.     memdefault = member(member(memref).memberNum + 1, castLibNum)
  18.     alternateImage = memdefault
  19.   end if
  20. end
  21.  
  22. on getPropertyDescriptionList
  23.   if the currentSpriteNum = 0 then
  24.     memdefault = 0
  25.   else
  26.     memref = the member of sprite the currentSpriteNum
  27.     castLibNum = memref.castLibNum
  28.     memdefault = member(member(memref).memberNum + 1, castLibNum)
  29.   end if
  30.   p_list = [#nextCM: [#comment: "Use Next Member:", #format: #boolean, #default: 1], #alternateImage: [#comment: "Rollover Cast Member:", #format: #graphic, #default: memdefault]]
  31.   return p_list
  32. end
  33.  
  34. on getBehaviorDescription
  35.   return "Change the sprite's cast member when the mouse rolls over the current sprite." & RETURN & "PARAMETERS:" & RETURN & "ΓÇó Use Next Member - Turn this option on to automatically display the next cast member in the cast when mouse rolls over the sprite." & RETURN & "ΓÇó Rollover Cast Member - Choose a specific cast member to appear when the mouse rolls over the sprite. This setting is ignored if Use Next Member is on."
  36. end
  37.